SoloCodigo

Hola!!

Como puedo saber el número de registros que devuelve una consulta sql?
Es decir, en mi aplicación tengo un DBGrid, y al hacer el usuario una consulta sql, en éste dbgrid me muestra los registros que coinciden con la consulta realizada, pues bien yo quiero poner debajo del DBGrid una label donde me muestre el número de registros devueltos por la consulta.

Por si es necesario saberlo, estoy usando DAO y base de datos Access 97

Muchas gracias, necesito saber hacer esto.

Mira lo puedes hacer de varias formas:

Forma 1:

Dim SQL as String
Dim Consulta as DAO.Recordset

SQL = "SELECT * FROM tabla WHERE campo ='" & dato & "'"

Set Consulta = Data.OpenRecordset(SQL)

If (Consulta.RecordCount >= 1) Then
    lblTotalRegistros.Caption = Consulta.RecordCount
    Data1.RecordSource = SQL
Else
    Msgbox "No existen registros para esta consulta.", vbCritical, "Error"
End If

Forma 2:

Haces el siguiente SELECT:

SQL = "SELECT COUNT(*) As Total FROM tabla WHERE campo ='" & dato & "'"

Este SELECT te devolvera en el campo 'Total' el total de registros que devuelve la consulta, si te queda alguna duda escribeme al correo y te respondere lo antes posible.

Nota: Desaconsejo el uso del control DATA y DBGRID, aconsejo el uso del control MSFlexGrid y MSHFlexGrid, si nesesitas codigo para saber como llenar un MSFlexGrid me escribes a mi correo.

Powered by Snake:D

Os agradezco muchisimo vuestras respuestas, ya he conseguido contar los registros gracias a vuestra ayuda.

Juan